home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 June / CHIP Turkiye Haziran 1997.iso / shar / biotry / biotray.exe / 0 / RCDATA / TFORM2 / TFORM2.txt < prev   
Text File  |  1997-01-29  |  54KB  |  1,907 lines
  1. object Form2: TForm2
  2.   Left = 180
  3.   Top = 93
  4.   BorderIcons = [biSystemMenu]
  5.   BorderStyle = bsSingle
  6.   Caption = 'BioTray by Fiens'
  7.   ClientHeight = 283
  8.   ClientWidth = 349
  9.   Color = clSilver
  10.   Font.Color = clWindowText
  11.   Font.Height = -11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = []
  14.   FormStyle = fsStayOnTop
  15.   Icon.Data = {<image000.ico>}
  16.   KeyPreview = True
  17.   Position = poScreenCenter
  18.   PixelsPerInch = 96
  19.   TextHeight = 13
  20.   object Label21: TLabel
  21.     Left = 0
  22.     Top = 322
  23.     Width = 641
  24.     Height = 14
  25.     AutoSize = False
  26.     Caption = '            '
  27.     Font.Color = clBlack
  28.     Font.Height = -13
  29.     Font.Name = 'Times New Roman'
  30.     Font.Style = []
  31.     ParentFont = False
  32.   end
  33.   object Label22: TLabel
  34.     Left = 21
  35.     Top = 362
  36.     Width = 206
  37.     Height = 19
  38.     AutoSize = False
  39.     Caption = 'Best :'
  40.     Font.Color = clBlack
  41.     Font.Height = -13
  42.     Font.Name = 'Times New Roman'
  43.     Font.Style = []
  44.     ParentFont = False
  45.     ShowAccelChar = False
  46.     Transparent = True
  47.   end
  48.   object Label23: TLabel
  49.     Left = 21
  50.     Top = 376
  51.     Width = 208
  52.     Height = 19
  53.     AutoSize = False
  54.     Caption = 'Worst :'
  55.     Font.Color = clBlack
  56.     Font.Height = -13
  57.     Font.Name = 'Times New Roman'
  58.     Font.Style = []
  59.     ParentFont = False
  60.     Transparent = True
  61.   end
  62.   object Label24: TLabel
  63.     Left = 229
  64.     Top = 362
  65.     Width = 208
  66.     Height = 19
  67.     AutoSize = False
  68.     Caption = 'Best :'
  69.     Font.Color = clBlack
  70.     Font.Height = -13
  71.     Font.Name = 'Times New Roman'
  72.     Font.Style = []
  73.     ParentFont = False
  74.     Transparent = True
  75.   end
  76.   object Label25: TLabel
  77.     Left = 231
  78.     Top = 376
  79.     Width = 206
  80.     Height = 19
  81.     AutoSize = False
  82.     Caption = 'Worst :'
  83.     Font.Color = clBlack
  84.     Font.Height = -13
  85.     Font.Name = 'Times New Roman'
  86.     Font.Style = []
  87.     ParentFont = False
  88.     Transparent = True
  89.   end
  90.   object Label26: TLabel
  91.     Left = 437
  92.     Top = 362
  93.     Width = 196
  94.     Height = 19
  95.     AutoSize = False
  96.     Caption = 'Best :'
  97.     Font.Color = clBlack
  98.     Font.Height = -13
  99.     Font.Name = 'Times New Roman'
  100.     Font.Style = []
  101.     ParentFont = False
  102.     Transparent = True
  103.   end
  104.   object Label27: TLabel
  105.     Left = 437
  106.     Top = 376
  107.     Width = 196
  108.     Height = 19
  109.     AutoSize = False
  110.     Caption = 'Worst :'
  111.     Font.Color = clBlack
  112.     Font.Height = -13
  113.     Font.Name = 'Times New Roman'
  114.     Font.Style = []
  115.     ParentFont = False
  116.     Transparent = True
  117.   end
  118.   object Label28: TLabel
  119.     Left = 11
  120.     Top = 342
  121.     Width = 188
  122.     Height = 19
  123.     AutoSize = False
  124.     Caption = 'Critical Emotional Days'
  125.     Font.Color = clRed
  126.     Font.Height = -16
  127.     Font.Name = 'Times New Roman'
  128.     Font.Style = [fsUnderline]
  129.     ParentFont = False
  130.     Transparent = True
  131.   end
  132.   object Label30: TLabel
  133.     Left = 441
  134.     Top = 342
  135.     Width = 192
  136.     Height = 19
  137.     AutoSize = False
  138.     Caption = 'Critical Physical Days'
  139.     Font.Color = clLime
  140.     Font.Height = -16
  141.     Font.Name = 'Times New Roman'
  142.     Font.Style = [fsUnderline]
  143.     ParentFont = False
  144.     Transparent = True
  145.   end
  146.   object Label32: TLabel
  147.     Left = 5
  148.     Top = 45
  149.     Width = 22
  150.     Height = 17
  151.     Alignment = taRightJustify
  152.     AutoSize = False
  153.     Caption = '100'
  154.     Font.Color = clBlack
  155.     Font.Height = -13
  156.     Font.Name = 'Times New Roman'
  157.     Font.Style = []
  158.     ParentFont = False
  159.   end
  160.   object Label33: TLabel
  161.     Left = 5
  162.     Top = 231
  163.     Width = 22
  164.     Height = 17
  165.     Alignment = taRightJustify
  166.     AutoSize = False
  167.     Caption = '0'
  168.     Font.Color = clBlack
  169.     Font.Height = -13
  170.     Font.Name = 'Times New Roman'
  171.     Font.Style = []
  172.     ParentFont = False
  173.   end
  174.   object Label34: TLabel
  175.     Left = 5
  176.     Top = 60
  177.     Width = 22
  178.     Height = 17
  179.     Alignment = taRightJustify
  180.     AutoSize = False
  181.     Caption = '90'
  182.     Font.Color = clBlack
  183.     Font.Height = -13
  184.     Font.Name = 'Times New Roman'
  185.     Font.Style = []
  186.     ParentFont = False
  187.   end
  188.   object Label35: TLabel
  189.     Left = 5
  190.     Top = 79
  191.     Width = 22
  192.     Height = 17
  193.     Alignment = taRightJustify
  194.     AutoSize = False
  195.     Caption = '80'
  196.     Font.Color = clBlack
  197.     Font.Height = -13
  198.     Font.Name = 'Times New Roman'
  199.     Font.Style = []
  200.     ParentFont = False
  201.   end
  202.   object Label36: TLabel
  203.     Left = 5
  204.     Top = 98
  205.     Width = 22
  206.     Height = 17
  207.     Alignment = taRightJustify
  208.     AutoSize = False
  209.     Caption = '70'
  210.     Font.Color = clBlack
  211.     Font.Height = -13
  212.     Font.Name = 'Times New Roman'
  213.     Font.Style = []
  214.     ParentFont = False
  215.   end
  216.   object Label37: TLabel
  217.     Left = 5
  218.     Top = 117
  219.     Width = 22
  220.     Height = 17
  221.     Alignment = taRightJustify
  222.     AutoSize = False
  223.     Caption = '60'
  224.     Font.Color = clBlack
  225.     Font.Height = -13
  226.     Font.Name = 'Times New Roman'
  227.     Font.Style = []
  228.     ParentFont = False
  229.   end
  230.   object Label38: TLabel
  231.     Left = 5
  232.     Top = 136
  233.     Width = 22
  234.     Height = 17
  235.     Alignment = taRightJustify
  236.     AutoSize = False
  237.     Caption = '50'
  238.     Font.Color = clBlack
  239.     Font.Height = -13
  240.     Font.Name = 'Times New Roman'
  241.     Font.Style = []
  242.     ParentFont = False
  243.   end
  244.   object Label39: TLabel
  245.     Left = 5
  246.     Top = 27
  247.     Width = 22
  248.     Height = 17
  249.     Alignment = taRightJustify
  250.     AutoSize = False
  251.     Caption = '%'
  252.     Font.Color = clBlack
  253.     Font.Height = -13
  254.     Font.Name = 'Times New Roman'
  255.     Font.Style = []
  256.     ParentFont = False
  257.   end
  258.   object Label40: TLabel
  259.     Left = 5
  260.     Top = 155
  261.     Width = 22
  262.     Height = 17
  263.     Alignment = taRightJustify
  264.     AutoSize = False
  265.     Caption = '40'
  266.     Font.Color = clBlack
  267.     Font.Height = -13
  268.     Font.Name = 'Times New Roman'
  269.     Font.Style = []
  270.     ParentFont = False
  271.   end
  272.   object Label41: TLabel
  273.     Left = 5
  274.     Top = 174
  275.     Width = 22
  276.     Height = 17
  277.     Alignment = taRightJustify
  278.     AutoSize = False
  279.     Caption = '30'
  280.     Font.Color = clBlack
  281.     Font.Height = -13
  282.     Font.Name = 'Times New Roman'
  283.     Font.Style = []
  284.     ParentFont = False
  285.   end
  286.   object Label42: TLabel
  287.     Left = 5
  288.     Top = 193
  289.     Width = 22
  290.     Height = 17
  291.     Alignment = taRightJustify
  292.     AutoSize = False
  293.     Caption = '20'
  294.     Font.Color = clBlack
  295.     Font.Height = -13
  296.     Font.Name = 'Times New Roman'
  297.     Font.Style = []
  298.     ParentFont = False
  299.     Visible = False
  300.   end
  301.   object Label43: TLabel
  302.     Left = 5
  303.     Top = 212
  304.     Width = 22
  305.     Height = 17
  306.     Alignment = taRightJustify
  307.     AutoSize = False
  308.     Caption = '10'
  309.     Font.Color = clBlack
  310.     Font.Height = -13
  311.     Font.Name = 'Times New Roman'
  312.     Font.Style = []
  313.     ParentFont = False
  314.     Visible = False
  315.   end
  316.   object Label31: TLabel
  317.     Left = 8
  318.     Top = 0
  319.     Width = 629
  320.     Height = 29
  321.     Alignment = taCenter
  322.     AutoSize = False
  323.     Caption = 'Hello, here is your power for this month...'
  324.     Font.Color = clBlack
  325.     Font.Height = -24
  326.     Font.Name = 'Times New Roman'
  327.     Font.Style = [fsUnderline]
  328.     ParentFont = False
  329.     Visible = False
  330.   end
  331.   object Label20: TLabel
  332.     Left = 0
  333.     Top = 306
  334.     Width = 637
  335.     Height = 14
  336.     AutoSize = False
  337.     Caption = '     '
  338.     Font.Color = clBlack
  339.     Font.Height = -13
  340.     Font.Name = 'Times New Roman'
  341.     Font.Style = []
  342.     ParentFont = False
  343.   end
  344.   object Label29: TLabel
  345.     Left = 233
  346.     Top = 342
  347.     Width = 206
  348.     Height = 19
  349.     AutoSize = False
  350.     Caption = 'Critical Intellectual Days'
  351.     Font.Color = clYellow
  352.     Font.Height = -16
  353.     Font.Name = 'Times New Roman'
  354.     Font.Style = [fsUnderline]
  355.     ParentFont = False
  356.     Transparent = True
  357.   end
  358.   object Label44: TLabel
  359.     Left = 2
  360.     Top = 28
  361.     Width = 639
  362.     Height = 14
  363.     AutoSize = False
  364.     Caption = '  '
  365.     Font.Color = clBlack
  366.     Font.Height = -15
  367.     Font.Name = 'Times New Roman'
  368.     Font.Style = []
  369.     ParentFont = False
  370.     Visible = False
  371.   end
  372.   object Label55: TLabel
  373.     Left = 28
  374.     Top = 404
  375.     Width = 171
  376.     Height = 16
  377.     Caption = 'UNREGISTERED VERSION'
  378.     Font.Color = clRed
  379.     Font.Height = -13
  380.     Font.Name = 'MS Sans Serif'
  381.     Font.Style = []
  382.     ParentFont = False
  383.   end
  384.   object Label56: TLabel
  385.     Left = 430
  386.     Top = 404
  387.     Width = 198
  388.     Height = 16
  389.     Caption = 'You see only the first month of life.'
  390.     Font.Color = clRed
  391.     Font.Height = -13
  392.     Font.Name = 'MS Sans Serif'
  393.     Font.Style = []
  394.     ParentFont = False
  395.   end
  396.   object Label63: TLabel
  397.     Left = 23
  398.     Top = 304
  399.     Width = 206
  400.     Height = 19
  401.     AutoSize = False
  402.     Caption = 'Best :'
  403.     Font.Color = clBlack
  404.     Font.Height = -13
  405.     Font.Name = 'Times New Roman'
  406.     Font.Style = []
  407.     ParentFont = False
  408.     ShowAccelChar = False
  409.     Transparent = True
  410.     Visible = False
  411.   end
  412.   object Label64: TLabel
  413.     Left = 23
  414.     Top = 318
  415.     Width = 208
  416.     Height = 19
  417.     AutoSize = False
  418.     Caption = 'Worst :'
  419.     Font.Color = clBlack
  420.     Font.Height = -13
  421.     Font.Name = 'Times New Roman'
  422.     Font.Style = []
  423.     ParentFont = False
  424.     Transparent = True
  425.     Visible = False
  426.   end
  427.   object Label65: TLabel
  428.     Left = 231
  429.     Top = 304
  430.     Width = 208
  431.     Height = 19
  432.     AutoSize = False
  433.     Caption = 'Best :'
  434.     Font.Color = clBlack
  435.     Font.Height = -13
  436.     Font.Name = 'Times New Roman'
  437.     Font.Style = []
  438.     ParentFont = False
  439.     Transparent = True
  440.     Visible = False
  441.   end
  442.   object Label66: TLabel
  443.     Left = 233
  444.     Top = 318
  445.     Width = 206
  446.     Height = 19
  447.     AutoSize = False
  448.     Caption = 'Worst :'
  449.     Font.Color = clBlack
  450.     Font.Height = -13
  451.     Font.Name = 'Times New Roman'
  452.     Font.Style = []
  453.     ParentFont = False
  454.     Transparent = True
  455.     Visible = False
  456.   end
  457.   object Label67: TLabel
  458.     Left = 439
  459.     Top = 304
  460.     Width = 196
  461.     Height = 19
  462.     AutoSize = False
  463.     Caption = 'Best :'
  464.     Font.Color = clBlack
  465.     Font.Height = -13
  466.     Font.Name = 'Times New Roman'
  467.     Font.Style = []
  468.     ParentFont = False
  469.     Transparent = True
  470.     Visible = False
  471.   end
  472.   object Label68: TLabel
  473.     Left = 439
  474.     Top = 318
  475.     Width = 196
  476.     Height = 19
  477.     AutoSize = False
  478.     Caption = 'Worst :'
  479.     Font.Color = clBlack
  480.     Font.Height = -13
  481.     Font.Name = 'Times New Roman'
  482.     Font.Style = []
  483.     ParentFont = False
  484.     Transparent = True
  485.     Visible = False
  486.   end
  487.   object Label69: TLabel
  488.     Left = 13
  489.     Top = 284
  490.     Width = 188
  491.     Height = 19
  492.     AutoSize = False
  493.     Caption = 'Critical Emotional Days'
  494.     Font.Color = clFuchsia
  495.     Font.Height = -16
  496.     Font.Name = 'Times New Roman'
  497.     Font.Style = [fsUnderline]
  498.     ParentFont = False
  499.     Transparent = True
  500.     Visible = False
  501.   end
  502.   object Label70: TLabel
  503.     Left = 443
  504.     Top = 284
  505.     Width = 192
  506.     Height = 19
  507.     AutoSize = False
  508.     Caption = 'Critical Physical Days'
  509.     Font.Color = clGreen
  510.     Font.Height = -16
  511.     Font.Name = 'Times New Roman'
  512.     Font.Style = [fsUnderline]
  513.     ParentFont = False
  514.     Transparent = True
  515.     Visible = False
  516.   end
  517.   object Label71: TLabel
  518.     Left = 235
  519.     Top = 284
  520.     Width = 206
  521.     Height = 19
  522.     AutoSize = False
  523.     Caption = 'Critical Intellectual Days'
  524.     Font.Color = clWhite
  525.     Font.Height = -16
  526.     Font.Name = 'Times New Roman'
  527.     Font.Style = [fsUnderline]
  528.     ParentFont = False
  529.     Transparent = True
  530.     Visible = False
  531.   end
  532.   object TabbedNotebook1: TTabbedNotebook
  533.     Left = 0
  534.     Top = 0
  535.     Width = 349
  536.     Height = 249
  537.     Hint = 'Click on one of the tab to choose a other menu...'
  538.     TabFont.Color = clBtnText
  539.     TabFont.Height = -12
  540.     TabFont.Name = 'MS Sans Serif'
  541.     TabFont.Style = []
  542.     ParentShowHint = False
  543.     ShowHint = False
  544.     TabOrder = 0
  545.     object TTabPage
  546.       Left = 4
  547.       Top = 24
  548.       Caption = 'Your Power'
  549.       object Image1: TImage
  550.         Left = -8
  551.         Top = -2
  552.         Width = 357
  553.         Height = 233
  554.         Picture.Data = {<image001.bmp>}
  555.         Stretch = True
  556.       end
  557.       object Label9: TLabel
  558.         Left = 2
  559.         Top = 6
  560.         Width = 339
  561.         Height = 19
  562.         Alignment = taCenter
  563.         AutoSize = False
  564.         Color = clBlue
  565.         Font.Color = clWhite
  566.         Font.Height = -17
  567.         Font.Name = 'Times New Roman'
  568.         Font.Style = [fsBold]
  569.         ParentColor = False
  570.         ParentFont = False
  571.       end
  572.       object Label1: TLabel
  573.         Left = 18
  574.         Top = 28
  575.         Width = 88
  576.         Height = 23
  577.         Caption = 'Emotional'
  578.         Font.Color = clRed
  579.         Font.Height = -21
  580.         Font.Name = 'Times New Roman'
  581.         Font.Style = []
  582.         ParentFont = False
  583.         Transparent = True
  584.       end
  585.       object Label2: TLabel
  586.         Left = 129
  587.         Top = 28
  588.         Width = 93
  589.         Height = 23
  590.         Caption = 'Intellectual'
  591.         Font.Color = clYellow
  592.         Font.Height = -21
  593.         Font.Name = 'Times New Roman'
  594.         Font.Style = []
  595.         ParentFont = False
  596.         Transparent = True
  597.       end
  598.       object Label3: TLabel
  599.         Left = 239
  600.         Top = 28
  601.         Width = 74
  602.         Height = 23
  603.         Caption = 'Physical '
  604.         Font.Color = clLime
  605.         Font.Height = -21
  606.         Font.Name = 'Times New Roman'
  607.         Font.Style = []
  608.         ParentFont = False
  609.         Transparent = True
  610.       end
  611.       object NeatoMeter1: TNeatoMeter
  612.         Left = 28
  613.         Top = 52
  614.         Width = 75
  615.         Height = 157
  616.         Hint = 'Here you see your percent of Emotional Power...'
  617.         BackColor = clSilver
  618.         BorderStyle = bsSingle
  619.         Completed = 0
  620.         Font.Color = clBlack
  621.         Font.Height = -24
  622.         Font.Name = 'Times New Roman'
  623.         Font.Style = []
  624.         ForeColor = clRed
  625.         ParentFont = False
  626.         ParentShowHint = False
  627.         Percent = 0
  628.         ShowHint = True
  629.         BevelDepth = 2
  630.         Direction = mdBottomToTop
  631.         UseFontColor = True
  632.       end
  633.       object NeatoMeter2: TNeatoMeter
  634.         Left = 134
  635.         Top = 52
  636.         Width = 75
  637.         Height = 157
  638.         Hint = 'There you see your percent of Intellectual Power...'
  639.         BackColor = clSilver
  640.         BorderStyle = bsSingle
  641.         Completed = 0
  642.         Font.Color = clBlack
  643.         Font.Height = -24
  644.         Font.Name = 'Times New Roman'
  645.         Font.Style = []
  646.         ForeColor = clYellow
  647.         ParentFont = False
  648.         ParentShowHint = False
  649.         Percent = 0
  650.         ShowHint = True
  651.         BevelDepth = 2
  652.         Direction = mdBottomToTop
  653.         UseFontColor = True
  654.       end
  655.       object NeatoMeter3: TNeatoMeter
  656.         Left = 238
  657.         Top = 52
  658.         Width = 75
  659.         Height = 157
  660.         Hint = 'Here you see your percent of Physical Power...'
  661.         BackColor = clSilver
  662.         BorderStyle = bsSingle
  663.         Completed = 0
  664.         Font.Color = clBlack
  665.         Font.Height = -24
  666.         Font.Name = 'Times New Roman'
  667.         Font.Style = []
  668.         ForeColor = clLime
  669.         ParentFont = False
  670.         ParentShowHint = False
  671.         Percent = 0
  672.         ShowHint = True
  673.         BevelDepth = 2
  674.         Direction = mdBottomToTop
  675.         UseFontColor = True
  676.       end
  677.     end
  678.     object TTabPage
  679.       Left = 4
  680.       Top = 24
  681.       Caption = 'Details'
  682.       object Image6: TImage
  683.         Left = 0
  684.         Top = -2
  685.         Width = 353
  686.         Height = 221
  687.         Picture.Data = {<image002.bmp>}
  688.         Stretch = True
  689.       end
  690.       object Label50: TLabel
  691.         Left = 36
  692.         Top = 6
  693.         Width = 269
  694.         Height = 107
  695.         AutoSize = False
  696.         Caption = 'Note the first day of your projection.'
  697.         Font.Color = clBlack
  698.         Font.Height = -37
  699.         Font.Name = 'Times New Roman'
  700.         Font.Style = []
  701.         ParentFont = False
  702.         Transparent = True
  703.         Visible = False
  704.       end
  705.       object Label51: TLabel
  706.         Left = 38
  707.         Top = 4
  708.         Width = 269
  709.         Height = 107
  710.         AutoSize = False
  711.         Caption = 'Note the first day of your projection.'
  712.         Font.Color = clWhite
  713.         Font.Height = -37
  714.         Font.Name = 'Times New Roman'
  715.         Font.Style = []
  716.         ParentFont = False
  717.         Transparent = True
  718.         Visible = False
  719.       end
  720.       object Memo1: TMemo
  721.         Left = 36
  722.         Top = 22
  723.         Width = 269
  724.         Height = 153
  725.         Alignment = taCenter
  726.         Color = clRed
  727.         Font.Color = clBlack
  728.         Font.Height = -19
  729.         Font.Name = 'Times New Roman'
  730.         Font.Style = []
  731.         Lines.Strings = (
  732.           'Sorry but you dont have yet '
  733.           'registered BioTray.'
  734.           ''
  735.           'With the registered version, you '
  736.           'could have lots '
  737.           'of interesting informations.'
  738.           ''
  739.           'You will see a calendar '
  740.           'displaying '
  741.           'the curves of '
  742.           'your biorhythm day by day.'
  743.           ''
  744.           'The best and critical days will '
  745.           'flash.'
  746.           ''
  747.           'You could also compare'
  748.           'your biorhythm with others.'
  749.           ''
  750.           'You can also print your '
  751.           'curves...'
  752.           ''
  753.           'And much more.'
  754.           ''
  755.           'Please register now,'
  756.           'it'#39's good for you...'
  757.           '(and for us).')
  758.         ParentFont = False
  759.         ScrollBars = ssVertical
  760.         TabOrder = 0
  761.       end
  762.       object MaskEdit2: TMaskEdit
  763.         Left = 128
  764.         Top = 134
  765.         Width = 91
  766.         Height = 32
  767.         Hint = 'Note here the begining of your curve...'
  768.         EditMask = '!99/99/00;1;_'
  769.         Font.Color = clBlack
  770.         Font.Height = -21
  771.         Font.Name = 'Arial'
  772.         Font.Style = []
  773.         MaxLength = 8
  774.         ParentFont = False
  775.         ParentShowHint = False
  776.         ShowHint = True
  777.         TabOrder = 1
  778.         Text = '01/01/01'
  779.         Visible = False
  780.       end
  781.       object BitBtn7: TBitBtn
  782.         Left = 30
  783.         Top = 184
  784.         Width = 281
  785.         Height = 29
  786.         Hint = 'Click here to see your power at the begining...'
  787.         Caption = 'Show me the Biorhythm of the first month of my life'
  788.         ParentShowHint = False
  789.         ShowHint = True
  790.         TabOrder = 2
  791.         OnClick = BitBtn7Click
  792.         Glyph.Data = {
  793.           78010000424D7801000000000000760000002800000020000000100000000100
  794.           04000000000000000000120B0000120B00000000000000000000000000000000
  795.           800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  796.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555550555
  797.           555555555555F55555555505555B0555570555F55557F55555F55B50555B0555
  798.           7B55575F5557F555575555B5055B5557B5555575F55755557555555B5550005B
  799.           55555557555FFF575555555555BBB0055555555555777FF5555555555BBBBB00
  800.           55555555577777FF55555000BBBBBBB050005FFF7777777F5FFFBBB5BBBBBBB0
  801.           BBB577757777777F77755555BBBBBBB55555555577777775555555555BBBBB55
  802.           55555555577777555555555705BBB55505555555F5777555F555557B5555055B
  803.           505555575555F5575F5557B5555B0555B50555755557F55575F55B55555B0555
  804.           5B5557555557F55557555555555B5555555555555557555555550000}
  805.         NumGlyphs = 2
  806.       end
  807.       object BitBtn8: TBitBtn
  808.         Left = 34
  809.         Top = 186
  810.         Width = 129
  811.         Height = 25
  812.         Hint = 'Click here to see your next power...'
  813.         Caption = 'Show Me'
  814.         ParentShowHint = False
  815.         ShowHint = True
  816.         TabOrder = 3
  817.         Visible = False
  818.         OnClick = BitBtn8Click
  819.         Glyph.Data = {
  820.           78010000424D7801000000000000760000002800000020000000100000000100
  821.           04000000000000000000120B0000120B00000000000000000000000000000000
  822.           800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  823.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555550555
  824.           555555555555F55555555505555B0555570555F55557F55555F55B50555B0555
  825.           7B55575F5557F555575555B5055B5557B5555575F55755557555555B5550005B
  826.           55555557555FFF575555555555BBB0055555555555777FF5555555555BBBBB00
  827.           55555555577777FF55555000BBBBBBB050005FFF7777777F5FFFBBB5BBBBBBB0
  828.           BBB577757777777F77755555BBBBBBB55555555577777775555555555BBBBB55
  829.           55555555577777555555555705BBB55505555555F5777555F555557B5555055B
  830.           505555575555F5575F5557B5555B0555B50555755557F55575F55B55555B0555
  831.           5B5557555557F55557555555555B5555555555555557555555550000}
  832.         NumGlyphs = 2
  833.         Spacing = 15
  834.       end
  835.       object BitBtn10: TBitBtn
  836.         Left = 178
  837.         Top = 186
  838.         Width = 127
  839.         Height = 25
  840.         Hint = 'Click here to compare 2 Biorhythms...'
  841.         Caption = 'Compare Us'
  842.         ParentShowHint = False
  843.         ShowHint = True
  844.         TabOrder = 4
  845.         Visible = False
  846.         OnClick = BitBtn10Click
  847.         Glyph.Data = {
  848.           78010000424D7801000000000000760000002800000020000000100000000100
  849.           04000000000000000000120B0000120B00000000000000000000000000000000
  850.           800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  851.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555550555
  852.           555555555555F55555555505555B0555570555F55557F55555F55B50555B0555
  853.           7B55575F5557F555575555B5055B5557B5555575F55755557555555B5550005B
  854.           55555557555FFF575555555555BBB0055555555555777FF5555555555BBBBB00
  855.           55555555577777FF55555000BBBBBBB050005FFF7777777F5FFFBBB5BBBBBBB0
  856.           BBB577757777777F77755555BBBBBBB55555555577777775555555555BBBBB55
  857.           55555555577777555555555705BBB55505555555F5777555F555557B5555055B
  858.           505555575555F5575F5557B5555B0555B50555755557F55575F55B55555B0555
  859.           5B5557555557F55557555555555B5555555555555557555555550000}
  860.         NumGlyphs = 2
  861.         Spacing = 15
  862.       end
  863.     end
  864.     object TTabPage
  865.       Left = 4
  866.       Top = 24
  867.       Caption = 'Setup'
  868.       object Image2: TImage
  869.         Left = -14
  870.         Top = -20
  871.         Width = 355
  872.         Height = 239
  873.         Picture.Data = {<image003.bmp>}
  874.         Stretch = True
  875.       end
  876.       object Label4: TLabel
  877.         Left = 28
  878.         Top = 4
  879.         Width = 285
  880.         Height = 31
  881.         Alignment = taCenter
  882.         Caption = 'Note here your first name '
  883.         Font.Color = clBlack
  884.         Font.Height = -27
  885.         Font.Name = 'Times New Roman'
  886.         Font.Style = []
  887.         ParentFont = False
  888.         Transparent = True
  889.       end
  890.       object Label5: TLabel
  891.         Left = 38
  892.         Top = 96
  893.         Width = 292
  894.         Height = 31
  895.         Caption = 'and there your birthdate... '
  896.         Font.Color = clBlack
  897.         Font.Height = -27
  898.         Font.Name = 'Times New Roman'
  899.         Font.Style = []
  900.         ParentFont = False
  901.         Transparent = True
  902.       end
  903.       object Label52: TLabel
  904.         Left = 40
  905.         Top = 98
  906.         Width = 292
  907.         Height = 31
  908.         Caption = 'and there your birthdate... '
  909.         Font.Color = clWhite
  910.         Font.Height = -27
  911.         Font.Name = 'Times New Roman'
  912.         Font.Style = []
  913.         ParentFont = False
  914.         Transparent = True
  915.       end
  916.       object Label53: TLabel
  917.         Left = 30
  918.         Top = 6
  919.         Width = 285
  920.         Height = 31
  921.         Alignment = taCenter
  922.         Caption = 'Note here your first name '
  923.         Font.Color = clWhite
  924.         Font.Height = -27
  925.         Font.Name = 'Times New Roman'
  926.         Font.Style = []
  927.         ParentFont = False
  928.         Transparent = True
  929.       end
  930.       object BitBtn1: TBitBtn
  931.         Left = 112
  932.         Top = 182
  933.         Width = 129
  934.         Height = 29
  935.         Hint = 'Click here if all is OK'
  936.         Caption = 'OK'
  937.         Default = True
  938.         ModalResult = 6
  939.         ParentShowHint = False
  940.         ShowHint = True
  941.         TabOrder = 0
  942.         OnClick = BitBtn1Click
  943.         Glyph.Data = {
  944.           78010000424D7801000000000000760000002800000020000000100000000100
  945.           04000000000000000000120B0000120B00000000000000000000000000000000
  946.           800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  947.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
  948.           333333333337FF3333333333330003333333333333777F333333333333080333
  949.           3333333F33777FF33F3333B33B000B33B3333373F777773F7333333BBB0B0BBB
  950.           33333337737F7F77F333333BBB0F0BBB33333337337373F73F3333BBB0F7F0BB
  951.           B333337F3737F73F7F3333BB0FB7BF0BB3333F737F37F37F73FFBBBB0BF7FB0B
  952.           BBB3773F7F37337F377333BB0FBFBF0BB333337F73F333737F3333BBB0FBF0BB
  953.           B3333373F73FF7337333333BBB000BBB33333337FF777337F333333BBBBBBBBB
  954.           3333333773FF3F773F3333B33BBBBB33B33333733773773373333333333B3333
  955.           333333333337F33333333333333B3333333333333337333333330000}
  956.         NumGlyphs = 2
  957.         Spacing = 30
  958.       end
  959.       object Edit1: TEdit
  960.         Left = 164
  961.         Top = 44
  962.         Width = 167
  963.         Height = 40
  964.         Hint = 'Note here your first name...'
  965.         Font.Color = clBlack
  966.         Font.Height = -27
  967.         Font.Name = 'Arial'
  968.         Font.Style = []
  969.         ParentFont = False
  970.         ParentShowHint = False
  971.         ShowHint = True
  972.         TabOrder = 1
  973.         Text = 'First Name'
  974.         OnExit = Edit1Exit
  975.       end
  976.       object MaskEdit1: TMaskEdit
  977.         Left = 82
  978.         Top = 134
  979.         Width = 117
  980.         Height = 40
  981.         Hint = 'Note here your birthday..'
  982.         EditMask = '!99/99/00;1;_'
  983.         Font.Color = clBlack
  984.         Font.Height = -27
  985.         Font.Name = 'Arial'
  986.         Font.Style = []
  987.         MaxLength = 8
  988.         ParentFont = False
  989.         ParentShowHint = False
  990.         ShowHint = True
  991.         TabOrder = 2
  992.         Text = '01/01/01'
  993.       end
  994.     end
  995.     object TTabPage
  996.       Left = 4
  997.       Top = 24
  998.       Caption = 'What is Biorhythm ?'
  999.       object Memo2: TMemo
  1000.         Left = 4
  1001.         Top = 2
  1002.         Width = 331
  1003.         Height = 213
  1004.         Alignment = taCenter
  1005.         Color = clWhite
  1006.         Font.Color = clGreen
  1007.         Font.Height = -16
  1008.         Font.Name = 'Times New Roman'
  1009.         Font.Style = []
  1010.         Lines.Strings = (
  1011.           'Biorhythm means rhythm of life.'
  1012.           ''
  1013.           'Our lives are governed by cycles that start at'
  1014.           'our day of birth.'
  1015.           ''
  1016.           'The theory has been applied in the past to'
  1017.           'accident prevention.'
  1018.           ''
  1019.           'Many companies have studied biorhythms and'
  1020.           'their effects on airline pilots and athletic teams.'
  1021.           ''
  1022.           'From the day we are born, we are governed'
  1023.           'by cycles.'
  1024.           ''
  1025.           'The 28-day cycle called the emotional or'
  1026.           'sensitivity cycle governs one'#39's temperament.'
  1027.           ''
  1028.           'The 33-day cycle, called the intellectual cycle,'
  1029.           'influences our intellect or thinking capacity.'
  1030.           ''
  1031.           'The 23-day cycle called the physical cycle'
  1032.           'governs the condition of one'#39's body.'
  1033.           ''
  1034.           ''
  1035.           'Those who have investigated the theory seem'
  1036.           'to agree on the length of these cycles'
  1037.           'as 28, 33 and 23 days respectively.'
  1038.           ''
  1039.           'The Emotional Cycle.'
  1040.           ''
  1041.           'The emotional cycle affects our nervous '
  1042.           'systems.'
  1043.           ''
  1044.           'The plus-period lasts 14 days and is a period'
  1045.           'of creative ability and moral energy.'
  1046.           'This is a period where we are full of energy,'
  1047.           'good for contests, public performances,'
  1048.           'conducting jobs where teamwork is required.'
  1049.           ''
  1050.           'The minus-period also lasting 14 days is a'
  1051.           'period where we lack ambition, tend to be'
  1052.           'moody and should be careful in our personal'
  1053.           'relations with others.'
  1054.           ''
  1055.           'The Intellectual Cycle.'
  1056.           ''
  1057.           'The intellectual cycle affects our'
  1058.           'understanding, adaptability, logic,'
  1059.           'judgement and concentration.'
  1060.           ''
  1061.           'The plus-period, lasting 16 1/2 days, is the'
  1062.           'best time for study, planning, examinations'
  1063.           'and decisions.'
  1064.           ''
  1065.           'The minus-period, also lasting 16 1/2 days,'
  1066.           'is a period in which we are apt to be lacking'
  1067.           'in good judgement.'
  1068.           'It is a time for gathering data or for jobs'
  1069.           'that require repetition.'
  1070.           ''
  1071.           'The Physical Cycle.'
  1072.           ''
  1073.           'The physical cycle is said to affect our'
  1074.           'vitality and strength.'
  1075.           ''
  1076.           'The plus-period lasts 11 1/2 days and these'
  1077.           'are days of physical vitality, strength and'
  1078.           'durability.'
  1079.           'It is a period of self confidence, courage and'
  1080.           'progressive spirit.'
  1081.           'Athletes usually find this period best for'
  1082.           'competitive sports.'
  1083.           ''
  1084.           'The minus-period also lasts 11 1/2 days and'
  1085.           'is a period of reduced energy.'
  1086.           'One tires more easily, is more liable to'
  1087.           'infectious diseases, medicines seem to work'
  1088.           'well, according to authorities.'
  1089.           'This is a period of rejuvenation where our'
  1090.           'body seems to be recharging.'
  1091.           'A good period for rest and relaxation.'
  1092.           ''
  1093.           'Critical Days.'
  1094.           ''
  1095.           'Critical days are those during which a cycle'
  1096.           'crosses from plus to minus (or minus to plus).'
  1097.           ''
  1098.           'The term critical is relative.'
  1099.           'It is a period of change where our system is'
  1100.           'in a state of flux.'
  1101.           ''
  1102.           'Statistical Research.'
  1103.           ''
  1104.           'Statistical research for over 50 years seems'
  1105.           'to disclose that during those critical days,'
  1106.           'especially the physical and emotional ones,'
  1107.           'we are more accident prone, lacking in'
  1108.           'coordination, judgement and alertness.'
  1109.           ''
  1110.           'During an emotionally critical day one is apt'
  1111.           'to make a slip of the tongue, irresponsible'
  1112.           'utterances, quarrel or have disputes.'
  1113.           'An intellectually critical day might cause'
  1114.           'failure of memory or mistakes.'
  1115.           '')
  1116.         ParentFont = False
  1117.         ScrollBars = ssVertical
  1118.         TabOrder = 0
  1119.       end
  1120.     end
  1121.     object TTabPage
  1122.       Left = 4
  1123.       Top = 24
  1124.       Caption = 'Stop'
  1125.       object Image7: TImage
  1126.         Left = 0
  1127.         Top = 0
  1128.         Width = 343
  1129.         Height = 219
  1130.         Picture.Data = {<image004.bmp>}
  1131.         Stretch = True
  1132.       end
  1133.       object Label54: TLabel
  1134.         Left = 165
  1135.         Top = 120
  1136.         Width = 147
  1137.         Height = 42
  1138.         Caption = 'BioTray...'
  1139.         Font.Color = clBlack
  1140.         Font.Height = -37
  1141.         Font.Name = 'Times New Roman'
  1142.         Font.Style = []
  1143.         ParentFont = False
  1144.         Transparent = True
  1145.       end
  1146.       object Label6: TLabel
  1147.         Left = 68
  1148.         Top = 26
  1149.         Width = 224
  1150.         Height = 33
  1151.         Caption = 'Click on the  button'
  1152.         Font.Color = clAqua
  1153.         Font.Height = -29
  1154.         Font.Name = 'Times New Roman'
  1155.         Font.Style = []
  1156.         ParentFont = False
  1157.         Transparent = True
  1158.       end
  1159.       object Label7: TLabel
  1160.         Left = 50
  1161.         Top = 68
  1162.         Width = 198
  1163.         Height = 33
  1164.         Caption = 'if you wanna stop'
  1165.         Font.Color = clYellow
  1166.         Font.Height = -29
  1167.         Font.Name = 'Times New Roman'
  1168.         Font.Style = []
  1169.         ParentFont = False
  1170.         Transparent = True
  1171.       end
  1172.       object Label8: TLabel
  1173.         Left = 163
  1174.         Top = 118
  1175.         Width = 147
  1176.         Height = 42
  1177.         Caption = 'BioTray...'
  1178.         Font.Color = clLime
  1179.         Font.Height = -37
  1180.         Font.Name = 'Times New Roman'
  1181.         Font.Style = []
  1182.         ParentFont = False
  1183.         Transparent = True
  1184.       end
  1185.       object BitBtn2: TBitBtn
  1186.         Left = 42
  1187.         Top = 176
  1188.         Width = 93
  1189.         Height = 31
  1190.         Hint = 'Click here to remove BioTray from memory...'
  1191.         Caption = '&Close'
  1192.         ParentShowHint = False
  1193.         ShowHint = True
  1194.         TabOrder = 0
  1195.         OnClick = BitBtn2Click
  1196.         Glyph.Data = {
  1197.           78010000424D7801000000000000760000002800000020000000100000000100
  1198.           04000000000000000000120B0000120B00000000000000000000000000000000
  1199.           800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  1200.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333033333
  1201.           33333333373F33333333333330B03333333333337F7F33333333333330F03333
  1202.           333333337F7FF3333333333330B00333333333337F773FF33333333330F0F003
  1203.           333333337F7F773F3333333330B0B0B0333333337F7F7F7F3333333300F0F0F0
  1204.           333333377F73737F33333330B0BFBFB03333337F7F33337F33333330F0FBFBF0
  1205.           3333337F7333337F33333330BFBFBFB033333373F3333373333333330BFBFB03
  1206.           33333337FFFFF7FF3333333300000000333333377777777F333333330EEEEEE0
  1207.           33333337FFFFFF7FF3333333000000000333333777777777F33333330000000B
  1208.           03333337777777F7F333333300000000033333377777777733330000}
  1209.         NumGlyphs = 2
  1210.         Spacing = 20
  1211.       end
  1212.     end
  1213.     object TTabPage
  1214.       Left = 4
  1215.       Top = 24
  1216.       Caption = 'Help'
  1217.       object Label10: TLabel
  1218.         Left = 62
  1219.         Top = -4
  1220.         Width = 206
  1221.         Height = 21
  1222.         Caption = 'The BioTray icons means : '
  1223.         Font.Color = clBlack
  1224.         Font.Height = -19
  1225.         Font.Name = 'Times New Roman'
  1226.         Font.Style = []
  1227.         ParentFont = False
  1228.         Transparent = True
  1229.       end
  1230.       object Image3: TImage
  1231.         Left = 44
  1232.         Top = 15
  1233.         Width = 41
  1234.         Height = 41
  1235.         Picture.Data = {<image005.bmp>}
  1236.       end
  1237.       object Image4: TImage
  1238.         Left = 146
  1239.         Top = 15
  1240.         Width = 41
  1241.         Height = 41
  1242.         Picture.Data = {<image006.bmp>}
  1243.       end
  1244.       object Image5: TImage
  1245.         Left = 242
  1246.         Top = 15
  1247.         Width = 41
  1248.         Height = 41
  1249.         Picture.Data = {<image007.bmp>}
  1250.       end
  1251.       object Label11: TLabel
  1252.         Left = 40
  1253.         Top = 50
  1254.         Width = 50
  1255.         Height = 19
  1256.         Caption = 'Emotion'
  1257.         Font.Color = clRed
  1258.         Font.Height = -16
  1259.         Font.Name = 'Times New Roman'
  1260.         Font.Style = []
  1261.         ParentFont = False
  1262.         Transparent = True
  1263.       end
  1264.       object Label12: TLabel
  1265.         Left = 142
  1266.         Top = 50
  1267.         Width = 47
  1268.         Height = 19
  1269.         Caption = 'Intellect'
  1270.         Font.Color = clYellow
  1271.         Font.Height = -16
  1272.         Font.Name = 'Times New Roman'
  1273.         Font.Style = []
  1274.         ParentFont = False
  1275.         Transparent = True
  1276.       end
  1277.       object Label13: TLabel
  1278.         Left = 238
  1279.         Top = 50
  1280.         Width = 49
  1281.         Height = 19
  1282.         Caption = 'Physical'
  1283.         Font.Color = clLime
  1284.         Font.Height = -16
  1285.         Font.Name = 'Times New Roman'
  1286.         Font.Style = []
  1287.         ParentFont = False
  1288.         Transparent = True
  1289.       end
  1290.       object Label14: TLabel
  1291.         Left = 8
  1292.         Top = 66
  1293.         Width = 323
  1294.         Height = 17
  1295.         Caption = 'How more tray icon is filled, how bigger is your power.'
  1296.         Font.Color = clBlack
  1297.         Font.Height = -15
  1298.         Font.Name = 'Times New Roman'
  1299.         Font.Style = []
  1300.         ParentFont = False
  1301.         Transparent = True
  1302.       end
  1303.       object Label15: TLabel
  1304.         Left = 16
  1305.         Top = 82
  1306.         Width = 308
  1307.         Height = 17
  1308.         Caption = 'Clicking on one of the tray icons show this windows.'
  1309.         Font.Color = clBlack
  1310.         Font.Height = -15
  1311.         Font.Name = 'Times New Roman'
  1312.         Font.Style = []
  1313.         ParentFont = False
  1314.         Transparent = True
  1315.       end
  1316.       object Label16: TLabel
  1317.         Left = 8
  1318.         Top = 98
  1319.         Width = 322
  1320.         Height = 17
  1321.         Caption = 'If you let your cursor on the tray icon, a hint will come.'
  1322.         Font.Color = clBlack
  1323.         Font.Height = -15
  1324.         Font.Name = 'Times New Roman'
  1325.         Font.Style = []
  1326.         ParentFont = False
  1327.         Transparent = True
  1328.       end
  1329.       object Label17: TLabel
  1330.         Left = 50
  1331.         Top = 114
  1332.         Width = 236
  1333.         Height = 17
  1334.         Caption = 'Put your name and birthdate with Setup.'
  1335.         Font.Color = clBlack
  1336.         Font.Height = -15
  1337.         Font.Name = 'Times New Roman'
  1338.         Font.Style = []
  1339.         ParentFont = False
  1340.         Transparent = True
  1341.       end
  1342.       object Label18: TLabel
  1343.         Left = 6
  1344.         Top = 130
  1345.         Width = 329
  1346.         Height = 17
  1347.         Caption = 'Release BioTray with the Exit button in the Stop pannel.'
  1348.         Font.Color = clBlack
  1349.         Font.Height = -15
  1350.         Font.Name = 'Times New Roman'
  1351.         Font.Style = []
  1352.         ParentFont = False
  1353.         Transparent = True
  1354.       end
  1355.       object Label19: TLabel
  1356.         Left = 10
  1357.         Top = 148
  1358.         Width = 323
  1359.         Height = 17
  1360.         Caption = 'Click on the green button if you want hide this window.'
  1361.         Font.Color = clBlack
  1362.         Font.Height = -15
  1363.         Font.Name = 'Times New Roman'
  1364.         Font.Style = []
  1365.         ParentFont = False
  1366.         Transparent = True
  1367.       end
  1368.       object Label57: TLabel
  1369.         Left = 32
  1370.         Top = 164
  1371.         Width = 239
  1372.         Height = 17
  1373.         Caption = 'Click on the right button to get the menu.'
  1374.         Font.Color = clBlack
  1375.         Font.Height = -15
  1376.         Font.Name = 'Times New Roman'
  1377.         Font.Style = []
  1378.         ParentFont = False
  1379.         Transparent = True
  1380.       end
  1381.       object BitBtn3: TBitBtn
  1382.         Left = 106
  1383.         Top = 186
  1384.         Width = 127
  1385.         Height = 33
  1386.         Hint = 'You want more info'#39's, then click here...'
  1387.         Caption = 'About BioTray'
  1388.         Font.Color = clBlack
  1389.         Font.Height = -12
  1390.         Font.Name = 'Times New Roman'
  1391.         Font.Style = []
  1392.         ParentFont = False
  1393.         ParentShowHint = False
  1394.         ShowHint = True
  1395.         TabOrder = 0
  1396.         OnClick = BitBtn3Click
  1397.         Glyph.Data = {
  1398.           C6050000424DC605000000000000360400002800000014000000140000000100
  1399.           0800000000009001000000000000000000000001000000010000000000000000
  1400.           80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
  1401.           A600FF040400FF080800FF0C0C00FF101000FF141400FF181800FF1C1C00FF20
  1402.           2000FF242400FF282800FF2C2C00FF303000FF343400FF383800FF3C3C00FF40
  1403.           4000FF444400FF484800FF4C4C00FF505000FF555500FF595900FF5D5D00FF61
  1404.           6100FF656500FF696900FF6D6D00FF717100FF757500FF797900FF7D7D00FF81
  1405.           8100FF858500FF898900FF8D8D00FF919100FF959500FF999900FF9D9D00FFA1
  1406.           A100FFA5A500FFAAAA00FFAEAE00FFB2B200FFB6B600FFBABA00FFBEBE00FFC2
  1407.           C200FFC6C600FFCACA00FFCECE00FFD2D200FFD6D600FFDADA00FFDEDE00FFE2
  1408.           E200FFE6E600FFEAEA00FFEEEE00FFF2F200FFF6F600FFFAFA001C4069002450
  1409.           8100B63C2800008100000095000000AA000000BE000000CE000000DE000000EE
  1410.           0000008120000095240000AA280000BE2C0000CE300000DE340000EE380000FF
  1411.           3C0000812C000095340000AA3C0000BE440000CE480000DE500000EE550000FF
  1412.           5D00008138000095440000AA4C0000BE550000CE5D0000DE650000EE6D0000FF
  1413.           7500008144000095500000AA5D0000BE650000CE6D0000DE790000EE810000FF
  1414.           890000814C0000955D0000AA690000BE750000CE7D0000DE890000EE910000FF
  1415.           9900008155000095650000AA750000BE810000CE8D0000DE950000EEA10000FF
  1416.           AA0000815D0000956D0000AA7D0000BE8D0000CE990000DEA50000EEB20000FF
  1417.           BA00008165000095790000AA890000BE950000CEA50000DEB20000EEBE0000FF
  1418.           CA0000816D000095810000AA910000BEA10000CEB20000DEBE0000EECA0000FF
  1419.           D600008175000095890000AA990000BEAA0000CEBA0000DECA0000EED60000FF
  1420.           E600008179000095910000AAA10000BEB60000CEC60000DED60000EEE20000FF
  1421.           F200008181000095950000AAAA0000BEBE0000CECE0000DEDE0000EEEE000079
  1422.           81000091950000A1AA0000B6BE0000C6CE0000D6DE0000E2EE0000F2FF000075
  1423.           8100008995000099AA0000AABE0000BACE0000CADE0000D6EE0000E6FF00006D
  1424.           8100008195000091AA0000A1BE0000B2CE0000BEDE0000CAEE0000D6FF002069
  1425.           8100287995002C8DAA003499BE0038AACE003CB6DE0040C2EE0044CEFF00346D
  1426.           81003C7D95004491AA004C9DBE0050AECE0059BADE0061CAEE0065D6FF007179
  1427.           81008591950095A1AA00A5B6BE00B6C6CE00C6D6DE00D2E2EE00DEF2FF008181
  1428.           810095959500AAAAAA00BEBEBE00CECECE00DEDEDE00EEEEEE00EEEE0000EEE6
  1429.           0000EEDA0000EACE0000EAC20000E6BA0000E6AE0000E6A10000E2910000E285
  1430.           0000DE790000DE690000DE590000DA440000F0FBFF00A4A0A000808080000000
  1431.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00070707070707
  1432.           07070000FAFA0000FA000000000007070707070700000006FAFA0000FA000006
  1433.           FA00070707070700000006FA060000FA060000FA0600070707070000000006FA
  1434.           00000000060000FA060007070707000000000000000000000000000000000707
  1435.           000000FCFCFCFC000000FCFCFC000000000007000000FB00FCFC0000000000FC
  1436.           000000FBFB000000FBFBFB00000000FBFBFB000000FBFBFBFB000000FBFBFB00
  1437.           0000FBFBFBFB0000FBFBFBFBFB00FBFBFBFB000000FBFBFBFB000000FBFBFB00
  1438.           0000FBFB0000000000FBFBFB0000070000FBFB000007FB0000000000FBFBFB00
  1439.           000007000000FB0000070000000700FBFBFBFB0000070700F900000000070000
  1440.           070700FBFBFB000007070700F900000000070007070700000000000007070700
  1441.           00F9F90000070707070700F9F90000070707070700F9F90007070707070700F9
  1442.           F90000070707070700F9F9000707070707070000000007070707070700000007
  1443.           0707070707070000000707070707070700000007070707070707000007070707
  1444.           07070707070707070707}
  1445.         Style = bsNew
  1446.       end
  1447.     end
  1448.   end
  1449.   object ShadowButton1: TShadowButton
  1450.     Left = 8
  1451.     Top = 252
  1452.     Width = 335
  1453.     Height = 29
  1454.     Hint = 
  1455.       'Click here if you want to hide this window and only see the tray' +
  1456.       ' icons...'
  1457.     Caption = 'CLICK HERE TO HIDE THIS WINDOW'
  1458.     Font.Color = clWhite
  1459.     Font.Height = -12
  1460.     Font.Name = 'Times New Roman'
  1461.     Font.Style = []
  1462.     ParentFont = False
  1463.     ParentShowHint = False
  1464.     ShowHint = True
  1465.     TabOrder = 1
  1466.     OnClick = ShadowButton1Click
  1467.     FaceColor = clGreen
  1468.   end
  1469.   object BitBtn5: TBitBtn
  1470.     Left = 68
  1471.     Top = 400
  1472.     Width = 141
  1473.     Height = 25
  1474.     Hint = 'Click there to see your prior curve...'
  1475.     Caption = 'Prior Mounth'
  1476.     ParentShowHint = False
  1477.     ShowHint = True
  1478.     TabOrder = 3
  1479.     OnClick = BitBtn5Click
  1480.     Glyph.Data = {
  1481.       78010000424D7801000000000000760000002800000020000000100000000100
  1482.       04000000000000000000120B0000120B00000000000000000000000000000000
  1483.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  1484.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  1485.       33333333333333333333333333333333333333333333333333FF333333333333
  1486.       3000333333FFFFF3F77733333000003000B033333777773777F733330BFBFB00
  1487.       E00033337FFF3377F7773333000FBFB0E000333377733337F7773330FBFBFBF0
  1488.       E00033F7FFFF3337F7773000000FBFB0E000377777733337F7770BFBFBFBFBF0
  1489.       E00073FFFFFFFF37F777300000000FB0E000377777777337F7773333330BFB00
  1490.       000033333373FF77777733333330003333333333333777333333333333333333
  1491.       3333333333333333333333333333333333333333333333333333333333333333
  1492.       33333333333333333333333333333333333333333333333333330000}
  1493.     NumGlyphs = 2
  1494.   end
  1495.   object BitBtn6: TBitBtn
  1496.     Left = 428
  1497.     Top = 400
  1498.     Width = 143
  1499.     Height = 25
  1500.     Hint = 'Click here to see your next curve...'
  1501.     Caption = 'Next Mounth'
  1502.     ParentShowHint = False
  1503.     ShowHint = True
  1504.     TabOrder = 4
  1505.     OnClick = BitBtn6Click
  1506.     Glyph.Data = {
  1507.       78010000424D7801000000000000760000002800000020000000100000000100
  1508.       04000000000000000000120B0000120B00000000000000000000000000000000
  1509.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  1510.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  1511.       3333333333333333333333333333333333333FFF333333333333000333333333
  1512.       3333777FFF3FFFFF33330B000300000333337F777F777773F333000E00BFBFB0
  1513.       3333777F773333F7F333000E0BFBF0003333777F7F3337773F33000E0FBFBFBF
  1514.       0333777F7F3333FF7FFF000E0BFBF0000003777F7F3337777773000E0FBFBFBF
  1515.       BFB0777F7F33FFFFFFF7000E0BF000000003777F7FF777777773000000BFB033
  1516.       33337777773FF733333333333300033333333333337773333333333333333333
  1517.       3333333333333333333333333333333333333333333333333333333333333333
  1518.       33333333333333333333333333333333333333333333333333330000}
  1519.     NumGlyphs = 2
  1520.   end
  1521.   object BitBtn4: TBitBtn
  1522.     Left = 314
  1523.     Top = 400
  1524.     Width = 105
  1525.     Height = 25
  1526.     Hint = 'Click here to hide this window...'
  1527.     Caption = 'OK'
  1528.     Default = True
  1529.     ModalResult = 1
  1530.     ParentShowHint = False
  1531.     ShowHint = True
  1532.     TabOrder = 2
  1533.     OnClick = BitBtn4Click
  1534.     Glyph.Data = {
  1535.       78010000424D7801000000000000760000002800000020000000100000000100
  1536.       04000000000000000000120B0000120B00000000000000000000000000000000
  1537.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  1538.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555550555
  1539.       555555555555F55555555505555B0555570555F55557F55555F55B50555B0555
  1540.       7B55575F5557F555575555B5055B5557B5555575F55755557555555B5550005B
  1541.       55555557555FFF575555555555BBB0055555555555777FF5555555555BBBBB00
  1542.       55555555577777FF55555000BBBBBBB050005FFF7777777F5FFFBBB5BBBBBBB0
  1543.       BBB577757777777F77755555BBBBBBB55555555577777775555555555BBBBB55
  1544.       55555555577777555555555705BBB55505555555F5777555F555557B5555055B
  1545.       505555575555F5575F5557B5555B0555B50555755557F55575F55B55555B0555
  1546.       5B5557555557F55557555555555B5555555555555557555555550000}
  1547.     NumGlyphs = 2
  1548.     Spacing = 15
  1549.   end
  1550.   object Panel3: TPanel
  1551.     Left = 0
  1552.     Top = 0
  1553.     Width = 349
  1554.     Height = 283
  1555.     Color = clLime
  1556.     TabOrder = 5
  1557.     Visible = False
  1558.     object Label45: TLabel
  1559.       Left = 22
  1560.       Top = 12
  1561.       Width = 306
  1562.       Height = 55
  1563.       Caption = 'Congratulation !'
  1564.       Font.Color = clGreen
  1565.       Font.Height = -48
  1566.       Font.Name = 'Times New Roman'
  1567.       Font.Style = []
  1568.       ParentFont = False
  1569.     end
  1570.     object Label46: TLabel
  1571.       Left = 14
  1572.       Top = 64
  1573.       Width = 316
  1574.       Height = 55
  1575.       Caption = 'In a few seconds'
  1576.       Font.Color = clRed
  1577.       Font.Height = -48
  1578.       Font.Name = 'Times New Roman'
  1579.       Font.Style = []
  1580.       ParentFont = False
  1581.     end
  1582.     object Label47: TLabel
  1583.       Left = 50
  1584.       Top = 114
  1585.       Width = 241
  1586.       Height = 55
  1587.       Caption = 'You will use'
  1588.       Font.Color = clRed
  1589.       Font.Height = -48
  1590.       Font.Name = 'Times New Roman'
  1591.       Font.Style = []
  1592.       ParentFont = False
  1593.     end
  1594.     object Label48: TLabel
  1595.       Left = 30
  1596.       Top = 158
  1597.       Width = 281
  1598.       Height = 55
  1599.       Caption = 'the full version'
  1600.       Font.Color = clRed
  1601.       Font.Height = -48
  1602.       Font.Name = 'Times New Roman'
  1603.       Font.Style = []
  1604.       ParentFont = False
  1605.       Transparent = True
  1606.     end
  1607.     object Label49: TLabel
  1608.       Left = 56
  1609.       Top = 214
  1610.       Width = 241
  1611.       Height = 55
  1612.       Caption = 'of BioTray...'
  1613.       Font.Color = clRed
  1614.       Font.Height = -48
  1615.       Font.Name = 'Times New Roman'
  1616.       Font.Style = []
  1617.       ParentFont = False
  1618.     end
  1619.   end
  1620.   object BitBtn9: TBitBtn
  1621.     Left = 216
  1622.     Top = 400
  1623.     Width = 89
  1624.     Height = 25
  1625.     Hint = 'Click here to print your curve...'
  1626.     Caption = 'Print'
  1627.     ParentShowHint = False
  1628.     ShowHint = True
  1629.     TabOrder = 6
  1630.     Visible = False
  1631.     OnClick = BitBtn9Click
  1632.     Glyph.Data = {
  1633.       76010000424D7601000000000000760000002800000020000000100000000100
  1634.       04000000000000010000130B0000130B00000000000000000000000000000000
  1635.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  1636.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
  1637.       00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
  1638.       8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
  1639.       8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
  1640.       8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
  1641.       03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
  1642.       03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
  1643.       33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
  1644.       33333337FFFF7733333333300000033333333337777773333333}
  1645.     NumGlyphs = 2
  1646.   end
  1647.   object OK: TBitBtn
  1648.     Left = 312
  1649.     Top = 400
  1650.     Width = 109
  1651.     Height = 25
  1652.     Hint = 'Click here to come back'
  1653.     Caption = 'OK'
  1654.     ParentShowHint = False
  1655.     ShowHint = True
  1656.     TabOrder = 7
  1657.     Visible = False
  1658.     OnClick = OKClick
  1659.     Glyph.Data = {
  1660.       78010000424D7801000000000000760000002800000020000000100000000100
  1661.       04000000000000000000120B0000120B00000000000000000000000000000000
  1662.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  1663.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555550555
  1664.       555555555555F55555555505555B0555570555F55557F55555F55B50555B0555
  1665.       7B55575F5557F555575555B5055B5557B5555575F55755557555555B5550005B
  1666.       55555557555FFF575555555555BBB0055555555555777FF5555555555BBBBB00
  1667.       55555555577777FF55555000BBBBBBB050005FFF7777777F5FFFBBB5BBBBBBB0
  1668.       BBB577757777777F77755555BBBBBBB55555555577777775555555555BBBBB55
  1669.       55555555577777555555555705BBB55505555555F5777555F555557B5555055B
  1670.       505555575555F5575F5557B5555B0555B50555755557F55575F55B55555B0555
  1671.       5B5557555557F55557555555555B5555555555555557555555550000}
  1672.     NumGlyphs = 2
  1673.     Spacing = 10
  1674.   end
  1675.   object BitBtn12: TBitBtn
  1676.     Left = 312
  1677.     Top = 400
  1678.     Width = 109
  1679.     Height = 25
  1680.     Hint = 'Click here to come back'
  1681.     Caption = 'O.K.'
  1682.     ParentShowHint = False
  1683.     ShowHint = True
  1684.     TabOrder = 8
  1685.     Visible = False
  1686.     OnClick = BitBtn12Click
  1687.     Glyph.Data = {
  1688.       78010000424D7801000000000000760000002800000020000000100000000100
  1689.       04000000000000000000120B0000120B00000000000000000000000000000000
  1690.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  1691.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555550555
  1692.       555555555555F55555555505555B0555570555F55557F55555F55B50555B0555
  1693.       7B55575F5557F555575555B5055B5557B5555575F55755557555555B5550005B
  1694.       55555557555FFF575555555555BBB0055555555555777FF5555555555BBBBB00
  1695.       55555555577777FF55555000BBBBBBB050005FFF7777777F5FFFBBB5BBBBBBB0
  1696.       BBB577757777777F77755555BBBBBBB55555555577777775555555555BBBBB55
  1697.       55555555577777555555555705BBB55505555555F5777555F555557B5555055B
  1698.       505555575555F5575F5557B5555B0555B50555755557F55575F55B55555B0555
  1699.       5B5557555557F55557555555555B5555555555555557555555550000}
  1700.     NumGlyphs = 2
  1701.     Spacing = 20
  1702.   end
  1703.   object BitBtn13: TBitBtn
  1704.     Left = 216
  1705.     Top = 400
  1706.     Width = 89
  1707.     Height = 25
  1708.     Hint = 'Click here to say who to compare'
  1709.     Caption = 'Compare'
  1710.     ParentShowHint = False
  1711.     ShowHint = True
  1712.     TabOrder = 9
  1713.     Visible = False
  1714.     OnClick = BitBtn13Click
  1715.     Kind = bkAll
  1716.   end
  1717.   object Panel1: TPanel
  1718.     Left = 180
  1719.     Top = 140
  1720.     Width = 321
  1721.     Height = 211
  1722.     BevelInner = bvLowered
  1723.     BorderStyle = bsSingle
  1724.     Color = 8388863
  1725.     TabOrder = 10
  1726.     Visible = False
  1727.     object Label58: TLabel
  1728.       Left = 10
  1729.       Top = 8
  1730.       Width = 294
  1731.       Height = 21
  1732.       Caption = 'Note here the 2 Biorhythms to compare'
  1733.       Font.Color = clBlack
  1734.       Font.Height = -19
  1735.       Font.Name = 'Times New Roman'
  1736.       Font.Style = [fsUnderline]
  1737.       ParentFont = False
  1738.     end
  1739.     object Label59: TLabel
  1740.       Left = 66
  1741.       Top = 30
  1742.       Width = 57
  1743.       Height = 21
  1744.       Caption = 'Name 1'
  1745.       Font.Color = clBlack
  1746.       Font.Height = -19
  1747.       Font.Name = 'Times New Roman'
  1748.       Font.Style = []
  1749.       ParentFont = False
  1750.       Transparent = True
  1751.     end
  1752.     object Label60: TLabel
  1753.       Left = 66
  1754.       Top = 98
  1755.       Width = 57
  1756.       Height = 21
  1757.       Caption = 'Name 2'
  1758.       Font.Color = clBlack
  1759.       Font.Height = -19
  1760.       Font.Name = 'Times New Roman'
  1761.       Font.Style = []
  1762.       ParentFont = False
  1763.       Transparent = True
  1764.     end
  1765.     object Label61: TLabel
  1766.       Left = 222
  1767.       Top = 30
  1768.       Width = 67
  1769.       Height = 21
  1770.       Caption = 'Birthdate'
  1771.       Font.Color = clBlack
  1772.       Font.Height = -19
  1773.       Font.Name = 'Times New Roman'
  1774.       Font.Style = []
  1775.       ParentFont = False
  1776.       Transparent = True
  1777.     end
  1778.     object Label62: TLabel
  1779.       Left = 222
  1780.       Top = 102
  1781.       Width = 67
  1782.       Height = 21
  1783.       Caption = 'Birthdate'
  1784.       Font.Color = clBlack
  1785.       Font.Height = -19
  1786.       Font.Name = 'Times New Roman'
  1787.       Font.Style = []
  1788.       ParentFont = False
  1789.       Transparent = True
  1790.     end
  1791.     object MaskEdit3: TMaskEdit
  1792.       Left = 206
  1793.       Top = 52
  1794.       Width = 91
  1795.       Height = 32
  1796.       Hint = 'Note here the begining of your curve...'
  1797.       EditMask = '!99/99/00;1;_'
  1798.       Font.Color = clBlack
  1799.       Font.Height = -21
  1800.       Font.Name = 'Arial'
  1801.       Font.Style = []
  1802.       MaxLength = 8
  1803.       ParentFont = False
  1804.       ParentShowHint = False
  1805.       ShowHint = True
  1806.       TabOrder = 1
  1807.       Text = '01/01/01'
  1808.     end
  1809.     object MaskEdit4: TMaskEdit
  1810.       Left = 206
  1811.       Top = 124
  1812.       Width = 91
  1813.       Height = 32
  1814.       Hint = 'Note here the begining of your curve...'
  1815.       EditMask = '!99/99/00;1;_'
  1816.       Font.Color = clBlack
  1817.       Font.Height = -21
  1818.       Font.Name = 'Arial'
  1819.       Font.Style = []
  1820.       MaxLength = 8
  1821.       ParentFont = False
  1822.       ParentShowHint = False
  1823.       ShowHint = True
  1824.       TabOrder = 3
  1825.       Text = '01/01/01'
  1826.     end
  1827.     object Edit2: TEdit
  1828.       Left = 16
  1829.       Top = 50
  1830.       Width = 167
  1831.       Height = 40
  1832.       Hint = 'Note here your first name...'
  1833.       Font.Color = clBlack
  1834.       Font.Height = -27
  1835.       Font.Name = 'Arial'
  1836.       Font.Style = []
  1837.       ParentFont = False
  1838.       ParentShowHint = False
  1839.       ShowHint = True
  1840.       TabOrder = 0
  1841.       Text = 'First Name'
  1842.       OnExit = Edit2Exit
  1843.     end
  1844.     object Edit3: TEdit
  1845.       Left = 16
  1846.       Top = 118
  1847.       Width = 167
  1848.       Height = 40
  1849.       Hint = 'Note here the second first name...'
  1850.       Font.Color = clBlack
  1851.       Font.Height = -27
  1852.       Font.Name = 'Arial'
  1853.       Font.Style = []
  1854.       ParentFont = False
  1855.       ParentShowHint = False
  1856.       ShowHint = True
  1857.       TabOrder = 2
  1858.       Text = 'Other'
  1859.       OnExit = Edit3Exit
  1860.     end
  1861.     object BitBtn11: TBitBtn
  1862.       Left = 98
  1863.       Top = 170
  1864.       Width = 111
  1865.       Height = 25
  1866.       Hint = 'Click here when you are OK'
  1867.       Caption = 'Show US'
  1868.       ParentShowHint = False
  1869.       ShowHint = True
  1870.       TabOrder = 4
  1871.       OnClick = BitBtn11Click
  1872.       Kind = bkAll
  1873.       Spacing = 20
  1874.     end
  1875.   end
  1876.   object Timer1: TTimer
  1877.     Enabled = False
  1878.     Interval = 5000
  1879.     OnTimer = Timer1Timer
  1880.     Left = 38
  1881.     Top = 116
  1882.   end
  1883.   object BalloonHint1: TBalloonHint
  1884.     BorderColor = clBlack
  1885.     Color = clInfoBk
  1886.     Font.Color = clWindowText
  1887.     Font.Height = -11
  1888.     Font.Name = 'MS Sans Serif'
  1889.     Font.Style = []
  1890.     MaxWidth = -4
  1891.     Behavior = [bbNoShowMouseDown, bbUseRegions, bbHideOnPaint]
  1892.     Position = bpAboveRight
  1893.     ShadowDepth = 8
  1894.     Shape = bsRoundRect
  1895.     Active = True
  1896.     Left = 108
  1897.     Top = 105
  1898.   end
  1899.   object Timer2: TTimer
  1900.     Enabled = False
  1901.     Interval = 500
  1902.     OnTimer = Timer2Timer
  1903.     Left = 60
  1904.     Top = 68
  1905.   end
  1906. end
  1907.